Analysis of COVID-19 Data for the State Of Ohio

Disclaimer:

• This is a personel project,
• I am not a employee of the state of Ohio.
• I am not employed in either the medical or data sceince fields.

Data Source: NY Times

• GitHub: https://github.com/nytimes/covid-19-data.git

# 
# state_date <- oh_state %>% group_by(county,date) %>% 
#   summarise(Cases=sum(cases),   Deaths = sum(deaths),                               
#    DeathRate = Deaths/Cases)

Ohio Totals for Cases, Deaths by Date (Previous 30 Days)

gg1 <- buckeye %>% filter(date >= Sys.Date() -30) %>% ggplot() + 
  geom_col(aes(x=date,y=daily_cases)) +
     labs(title="Ohio Cases by Date") 

Ohio Accumulated Totals for Cases, Deaths by Date and County